gusucode.com > 依悠ASP广告管理系统 v2.1 > 依悠ASP广告管理系统 v2.1\code\Update.asp
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <!--#include file = "AD_Conn.asp"--> <% '=================================================================================== '依悠广告管理系统 V2.1 使用帮助 ' '帮助你把网站上的所有广告按照广告大小或位置进行分类管理,然后用本系统分配的固定Scrip代码调用设置广告,获取代码请点广告管理的预览。 ' '安装说明: ' '1. 需要支持ASP和Access数据库的空间。 ' '2. 管理员登陆页面:index.asp,用户名为:admin,密码:admin,请安装后立即修改! ' '3. 数据库连接地址:AD_Conn.asp ' '4. 发现任何问题、缺陷或者有必要增加些功能请通知作者,作者会尽力改进,谢谢。 ' '5. 本软件系免费程序,提供给个人免费使用,如果用于商业用途请酌情付费支持,请不要修改作者版权。 ' '6. 如建设网站中遇到任何问题可在论坛发问,必定回复。 ' '作者:双鱼 论坛:http://www.yiuu.net QQ:125047083 E-MAIL:otutu@126.com ' ' 2008年5月8日 '================================================================================== Set Rs = Server.CreateObject("Adodb.Recordset") Sub U20 Conn.Execute "Create Table tt_class(c_id IDENTITY (1,1),c_tid int,c_name char(25),primary key(c_id))" Conn.Execute "alter table tt_ad add a_class int,a_beiz text" Rs.Open "Select a_class from tt_ad",Conn,1,3 Do While Not Rs.Eof Rs("a_class") = 0 Rs.MoveNext Loop Rs.Close Response.Write("1.x-2.0数据库升级成功") End Sub Sub U21 Conn.Execute "Create Table tt_file(f_id IDENTITY (1,1),f_name char(50),f_path char(50),f_time char(50),f_size char(50),primary key(f_id))" Conn.Execute "alter table tt_ad add a_js int" Response.Write("2.0-2.1数据库升级成功") End Sub %> <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312" /> <title>依悠广告 数据库升级</title> <script type="text/JavaScript"> <!-- function MM_jumpMenu(targ,selObj,restore){ //v3.0 eval(targ+".location='"+selObj.options[selObj.selectedIndex].value+"'"); if (restore) selObj.selectedIndex=0; } //--> </script> </head> <body> <% Dim GO GO = Request.QueryString("GO") Select Case GO Case "1.x-2.0" Call U20 Case "2.0-2.1" Call U21 End Select %> <form name="form1" id="form1"> <select name="menu1" size="1" onchange="MM_jumpMenu('parent',this,0)"> <option value="">请选择升级的版本</option> <option value="?GO=1.x-2.0">1.x-2.0</option> <option value="?GO=2.0-2.1">2.0-2.1</option> </select> </form> </body> </html>